	.data
	.text
	.globl main

main:
	vetorD .word 1000
	la $s0, VetorD
	li $t0, m
	lw $t0, 0[$s0] # == D[m] 
	li $t1, n
	add $s1, $t1, $t0
	vetorM .word 10000
	la $s2, vetorM
	lw $s1, 0[$s2]
	addi $t2, $t2, 1
	la $s2, $t2
	sw $s2, $t2
	sw $s2, 0[$s1]
	la $s2, $t2
	add $a0, $s2, $zero
	li $v0, 1
	syscall
